home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HPAVC
/
HPAVC CD-ROM.iso
/
BTH2SRC.ZIP
/
INTRO.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1995-12-03
|
6KB
|
83 lines
{ TheDraw Pascal Crunched Screen Image. Date: 12/03/95 }
procedure introansi;
const
IMAGEDATA_WIDTH=80;
IMAGEDATA_DEPTH=22;
IMAGEDATA_LENGTH=1233;
IMAGEDATA : array [1..1233] of Char = (
#15,#16,#25,'!', #8,'▄','▄','█','█','█','▄','▄',#25, #9,'▄','▄',#23,
'▓',#16,'▄','▄',#24,#26,#31,'-',' ','▀','█',#23,'█','▓',#16,'█','▄',
' ',' ','▀',' ',' ','▀',' ','▄','▄','▀','▀','▀','█','█','█',#23,'█',
'▓','█',#16,'▄',' ',#26,#20,'-',#24, #0,#17,#26,#25,'▓',#16,' ',' ',
#8,'▄','▄','█','█',#23,'▓',#16,'▄','▄',' ','▀','▀',#23,'▓',#16,'▀',
' ','▄',' ','■','▄','▄',#25, #4,'▄',' ','▀',#23,'█','█','█','▓',#16,
'▌',' ', #0,#17,#26,#19,'▓',#24,#26,#24,'▒',#16,' ', #8,'▄','█',#23,
'▓',#16,'█',#23,'█',#16,'█','█','▀','▀','▀','▄',' ',' ','■',' ','▄',
'▄','▄',#25, #2,'░','▄','▀',' ', #1,'▄',' ', #8,'▄','▐',#23,'█','▓',
#16,'▀',' ', #0,#17,#26,#20,'▒',#24,#26, #6,'░',#26, #9,'▄',#26, #6,
'░',#16,' ', #8,'▐',#23,'▓','▓',#16,'█','▓','▄',#25, #4,'▐','▌',#12,
'░',' ', #8,'▀',#25, #2,'▀','▀','▄','▐','▌',' ', #1,'▀', #0,#17,'░',
#1,#16,'▄',' ', #8,'▀','▀',' ', #1,'▄', #0,#17,#26,#21,'░',#24,' ',
'▄','▄',#16,' ',#14,#26, #3,'▄',#26, #7,'█','▄','▄','▄',' ', #0,#17,
'▄','▄', #9,'░',' ', #0,'░',#16,' ', #8,'▀','█','▀','▀',#25, #3,'▄',
'▀','▀',' ',#12,'▄','▄','▀',' ', #4,'▄',#12,#20,'▄',#16,'█','▄',' ',
#8,'▀',#12,'▄','█','▄',' ', #1,#26,#10,'█',#17,' ',#16,#26,#15,'█',
#24, #0,#17,'█',#14,#16,'▄',#26,#18,'█','▄',' ', #0,#17,'▄', #9,'░',
' ', #0,'▀', #1,#16,'▄',' ', #8,'■',' ',' ','▀',' ',#12,'▄','▄','▀',
'▀','█','▌',' ', #4,'▐',#12,#20,'▐',#16,#26, #7,'█','▌', #1,'▐','█',
#9,#17,'░', #1,#16,#26, #5,'█',#26, #5,'▀',#26, #3,'█', #9,#17,'░',
#1,#16,#26, #5,'█', #9,#17,'░', #1,#16,'█',#24, #8,'▌',#14,'▀',#26,
#7,'█',#26, #7,'▀',#26, #4,'█',' ', #0,#17,'▄', #9,'▒','░',' ', #1,
#16,'▀',' ',#12,'▄','▄','█','▀','▄','█',#20,'█','█',#16,'█',' ',' ',
#20,' ','▀','▀','▀','▓',#16,'█',#20,'█',#16,'█','█','▀', #1,'▄', #9,
#17,'░','░','▒','░', #1,#16,'▀','▀',' ', #7,'▄', #8,'▄','▄',#26, #3,
'█','▄','▄',' ', #1,'▀', #9,#17,'░','▒','░', #1,#16,#26, #3,'▀', #9,
#17,'░','░','░',#24, #8,#16,'█','▄','▄',' ',#14,'▀','▀','█','▀',' ',
#8,'▄','▄','█',#23,'█','▓','▒', #7,#16,'▄', #8,#23,'▒', #7,#16,'▄',
' ',#14,'▀','▀','█','█','█',' ', #9,#17,'▒', #0,'▄',#16,' ',#12,'▄',
'█',' ',#15,'▄',' ',#12,'▀',#20,'▒','▓',#16,'█','█',#22,'█',#16,'▌',
' ',#15,'▄','▄','▄',' ', #4,'▀',#12,#20,'▀','▓',#16,'▀',' ', #1,'■',
#26, #3,'▀',' ', #7,'▄', #8,#23,'░', #7,#16,'▄', #8,#23,'░','▓',#16,
'█','█','▀','█','▄','█','▀','█','▄',' ',' ','▄','▄',#23,'█','▓',#16,
'▄',' ', #9,#17,'░','░',#24, #8,#16,#26, #3,'█','▓','▄',' ','▄','█',
'█','█','▀','█','█',#23,'▓','▒','▓','░','▓','█',#16,'▄','▄','▄',' ',
#12,'▄','▄','█','█',#20,'█',#16,'█','▄','▄',#25, #2,'▀','▀',#20,'▓',
#16,'▀','▀','▄','▄',#25, #2,#26, #5,'▄',#26, #4,'▀','▄', #7,'▀', #8,
#23,'░','░','▒','▓','█','▓',#16,'█','█','█','▌','▐','█','▌',#26, #5,
'█','▌', #1,'▐', #9,#17,'░',#24, #8,#23,'▓',#16,#26, #4,'█','▐',#26,
#7,'█',#23,'▓',#16,'█',#23,'▒',#16,'█','█','█','▀',#12,'▄','▀','▀',
'▀',#25, #5,'▀','▀','▀',#26, #7,'▄','▀','▀',' ',#15,'▄',' ',' ','▄',
'▄','▄',' ','▀',#23,'▓',#16,'■',#12,'▐','▌', #8,'▐',#23,'▒',#16,#26,
#6,'█','▄','█','█','█','▐',#26, #5,'█',' ', #1,'▀',#24, #8,#26, #4,
'█','▄','█','█','█',#23,'▓',#16,'█','█','█','▄','▀',#23,'█',#16,'█',
#23,'▓',#16,'█','█','▌',#12,'▐','▌',' ',' ','▄','▄',#22,'▓',#20,'▄',
' ', #4,#16,#26, #3,'█','▄','▄',#25, #3, #8,'▄',' ', #7,'▄',' ',#15,
#23,'▀','█',#16,'█','▌', #7,'▐',#15,#23,'▐',#16,'█','█','█',' ',#12,
'▄','▄','▀', #8,'▄',#26,#11,'█','▄',#26, #7,'█','▄',#24,#23,'▓',#16,
#26, #7,'█',#23,'▓',#16,#26, #5,'█','▄','▄','▀','▀','█','▄',#12,'▀',
'▄','▄',' ','▀',' ',' ',#26, #3,'▄',' ', #4,#26, #4,'▀','■',' ',' ',
#12,'▄',' ', #7,'█',#15,#23,'▓',#16,'█','█',' ',#23,' ','▀','▓',#16,
' ',#12,'▀', #8,'▄','▄','▓','█','▀',#23,'▓',#16,#26,#18,'█',#23,'▓',
#24,'▒','▓',#16,#26,#13,'█',#23,'▓',#16,#26, #5,'█','▄',' ',#12,#26,
#3,'▀',' ', #8,'▄','▄',' ',#12,#26, #3,'▀','▄','▄','▀','▀','▀',' ',
#8,'▄',' ', #7,'▀',#15,'▀',' ',' ', #7,'▀',' ', #8,'▄',#26, #8,'█',
'▄','▄','█','▀','█','█','█','▄',#26, #6,'█',#23,'▓',#16,'█',#23,'▓',
'▒',#24,#16,#26,'6','-',' ','/',' ', #7,'m','o','d','e','u','s',' ',
'k','h','a','h','n',' ', #8,'/',' ',#26, #6,'-',#24,#25,#21,#15,'B',
'e','y','o','n','d',' ','T','h','e',' ','H','o','r','i','z','o','n',
' ',':',' ','I','s','s','u','e',' ','N','u','m','b','e','r',' ','T',
'w','o',#24, #8,#26,'O','-',#24,#25,#13, #7,'L','a','y','o','u','t',
' ','a','n','d',' ','D','e','s','i','g','n',' ',':',' ','M','i','n',
'd','C','r','i','m','e', #8,'/', #7,'S','h','i','v','a','n',' ','B',
'a','s','t','a','r','d', #8,'/', #7,'P','u','s','h','e','a','d',#24,
#25,#28,'C','o','d','i','n','g',' ',':',' ','S','h','i','v','a','n',
' ','B','a','s','t','a','r','d',#24,#25,#23,'M','a','i','n',' ','I',
'n','t','e','r','f','a','c','e',' ',':',' ','S','u','b','c','o','n',
's','i','o','u','s','n','e','s','s',#24,#25,#21,'R','e','a','d','e',
'r',' ','I','n','t','e','r','f','a','c','e',' ',':',' ','F','a','c',
's','i','m','i','l','e', #8,'/', #7,'P','u','s','h','e','a','d',#24,
#25,#28,'V','G','A',' ','A','n','i','m','a','t','i','o','n',' ',':',
' ','N','e','m','e','s','i','s',#24);
begin;
UnCrunch (IMAGEDATA,ScreenAddr[ (1*2) + (1*160) -162],IMAGEDATA_LENGTH);
end;